；；
指定长度，找出和最大的子列
；；
@最大和子列 = @【#集，#长】｛
    如果 #长 大于等于 @取长度【#集】 ｛ 返回 #集 ｝
    #起：1
    #最大起：0
    #最大和：0
    当 #序：0，#序 小于 #长，#序 自加 1 ｛
        #最大和 自加 #集#序
    ｝
    #和：#最大和
    当 #起 + #长 小于等于 @取长度【#集】｛
        #和 自减 #集#【#起-1】
        #和 自加 #集#【#起+#长-1】
        如果 #和 大于 #最大和 ｛
            #最大和 = #和
            #最大起 = #起
        ｝
        #起 自加 1
    ｝
    返回 @切片【#集，#最大起，#长】
｝
@显示、@最大和子列【【-1,-2,3,4】，3】







